
clear
clc
KK = 4092

cd 'D:\data_replication'

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

load('estimation/5_supply_side/main_data_supply.mat')

% Zeta
%--------------------------------------------------------------------------

zeta_i_k = readtable('data/firm_size_distribution/zeta_k.csv');
c_zeta = table2array(zeta_i_k(:,2));

zeta_new = zeros(4092,2);
for i_k = 1:4092
k = index_price_coeff(i_k,1); 
zeta_new(i_k,1) = i_k;
zeta_new(i_k,2) = c_zeta(k,1);
end

csvwrite('data/firm_size_distribution/zeta_i_k.csv', zeta_new);

